1 '------------------------------------------------------------------------------
2 ' <auto-generated>
3 ' This code was generated by a tool.
4 ' Runtime Version:4.0.30319.34209
5 '
6 ' Changes to this file may cause incorrect behavior and will be lost if
7 ' the code is regenerated.
8 ' </auto-generated>
9 '------------------------------------------------------------------------------
10
11 Option Strict Off
12 Option Explicit On
13
14 Imports CrystalDecisions.CrystalReports.Engine
15 Imports CrystalDecisions.ReportSource
16 Imports CrystalDecisions.Shared
17 Imports System
18 Imports System.ComponentModel
19
20
21 Public Class rptVoucher
22 Inherits ReportClass
23
24 Public Sub New()
25 MyBase.New
26 End Sub
27
28 Public Overrides Property ResourceName() As String
29 Get
30 Return "rptVoucher.rpt"
31 End Get
32 Set
33 'Do nothing
34 End Set
35 End Property
36
37 Public Overrides Property NewGenerator() As Boolean
38 Get
39 Return true
40 End Get
41 Set
42 'Do nothing
43 End Set
44 End Property
45
46 Public Overrides Property FullResourceName() As String
47 Get
48 Return "ERP_System.rptVoucher.rpt"
49 End Get
50 Set
51 'Do nothing
52 End Set
53 End Property
54
55 <Browsable(false), _
56 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
57 Public ReadOnly Property Section1() As CrystalDecisions.CrystalReports.Engine.Section
58 Get
59 Return Me.ReportDefinition.Sections(0)
60 End Get
61 End Property
62
63 <Browsable(false), _
64 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
65 Public ReadOnly Property Section2() As CrystalDecisions.CrystalReports.Engine.Section
66 Get
67 Return Me.ReportDefinition.Sections(1)
68 End Get
69 End Property
70
71 <Browsable(false), _
72 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
73 Public ReadOnly Property GroupHeaderSection1() As CrystalDecisions.CrystalReports.Engine.Section
74 Get
75 Return Me.ReportDefinition.Sections(2)
76 End Get
77 End Property
78
79 <Browsable(false), _
80 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
81 Public ReadOnly Property Section3() As CrystalDecisions.CrystalReports.Engine.Section
82 Get
83 Return Me.ReportDefinition.Sections(3)
84 End Get
85 End Property
86
87 <Browsable(false), _
88 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
89 Public ReadOnly Property GroupFooterSection1() As CrystalDecisions.CrystalReports.Engine.Section
90 Get
91 Return Me.ReportDefinition.Sections(4)
92 End Get
93 End Property
94
95 <Browsable(false), _
96 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
97 Public ReadOnly Property Section4() As CrystalDecisions.CrystalReports.Engine.Section
98 Get
99 Return Me.ReportDefinition.Sections(5)
100 End Get
101 End Property
102
103 <Browsable(false), _
104 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
105 Public ReadOnly Property Section5() As CrystalDecisions.CrystalReports.Engine.Section
106 Get
107 Return Me.ReportDefinition.Sections(6)
108 End Get
109 End Property
110 End Class
111
112 <System.Drawing.ToolboxBitmapAttribute(GetType(CrystalDecisions.[Shared].ExportOptions), "report.bmp")> _
113 Public Class CachedrptVoucher
114 Inherits Component
115 Implements ICachedReport
116
117 Public Sub New()
118 MyBase.New
119 End Sub
120
121 <Browsable(false), _
122 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
123 Public Overridable Property IsCacheable() As Boolean Implements CrystalDecisions.ReportSource.ICachedReport.IsCacheable
124 Get
125 Return true
126 End Get
127 Set
128 '
129 End Set
130 End Property
131
132 <Browsable(false), _
133 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
134 Public Overridable Property ShareDBLogonInfo() As Boolean Implements CrystalDecisions.ReportSource.ICachedReport.ShareDBLogonInfo
135 Get
136 Return false
137 End Get
138 Set
139 '
140 End Set
141 End Property
142
143 <Browsable(false), _
144 DesignerSerializationVisibilityAttribute(System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
145 Public Overridable Property CacheTimeOut() As System.TimeSpan Implements CrystalDecisions.ReportSource.ICachedReport.CacheTimeOut
146 Get
147 Return CachedReportConstants.DEFAULT_TIMEOUT
148 End Get
149 Set
150 '
151 End Set
152 End Property
153
154 Public Overridable Function CreateReport() As CrystalDecisions.CrystalReports.Engine.ReportDocument Implements CrystalDecisions.ReportSource.ICachedReport.CreateReport
155 Dim rpt As rptVoucher = New rptVoucher()
156 rpt.Site = Me.Site
157 Return rpt
158 End Function
159
160 Public Overridable Function GetCustomizedCacheKey(ByVal request As RequestContext) As String Implements CrystalDecisions.ReportSource.ICachedReport.GetCustomizedCacheKey
161 Dim key As [String] = Nothing
162 '// The following is the code used to generate the default
163 '// cache key for caching report jobs in the ASP.NET Cache.
164 '// Feel free to modify this code to suit your needs.
165 '// Returning key == null causes the default cache key to
166 '// be generated.
167 '
168 'key = RequestContext.BuildCompleteCacheKey(
169 ' request,
170 ' null, // sReportFilename
171 ' this.GetType(),
172 ' this.ShareDBLogonInfo );
173 Return key
174 End Function
175 End Class